home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / language / iconv8_s.arc / ICONT.ARC / OPCODE.C < prev    next >
C/C++ Source or Header  |  1990-03-28  |  3KB  |  125 lines
  1. #include "..\h\config.h"
  2. #include "general.h"
  3. #include "tproto.h"
  4. #include "link.h"
  5. #include "opcode.h"
  6.  
  7. /*
  8.  * Opcode table.
  9.  */
  10.  
  11. struct opentry optable[] = {
  12.    "asgn",    Op_Asgn,
  13.    "bang",    Op_Bang,
  14.  
  15.  
  16.    "bscan",    Op_Bscan,
  17.  
  18.  
  19.    "cat",    Op_Cat,
  20.    "ccase",    Op_Ccase,
  21.    "chfail",    Op_Chfail,
  22.    "coact",    Op_Coact,
  23.    "cofail",    Op_Cofail,
  24.  
  25. #ifdef EvalTrace
  26.    "colm",    Op_Colm,
  27. #endif                    /* EvalTrace */
  28.    "compl",    Op_Compl,
  29.    "con",    Op_Con,
  30.    "coret",    Op_Coret,
  31.    "create",    Op_Create,
  32.    "cset",    Op_Cset,
  33.    "declend",    Op_Declend,
  34.    "diff",    Op_Diff,
  35.    "div",    Op_Div,
  36.    "dup",    Op_Dup,
  37.    "efail",    Op_Efail,
  38.    "end",    Op_End,
  39.    "eqv",    Op_Eqv,
  40.    "eret",    Op_Eret,
  41.    "error",    Op_Error,
  42.    "escan",    Op_Escan,
  43.    "esusp",    Op_Esusp,
  44.    "field",    Op_Field,
  45.    "filen",    Op_Filen,
  46.  
  47.  
  48.    "global",    Op_Global,
  49.    "goto",    Op_Goto,
  50.    "impl",    Op_Impl,
  51.    "init",    Op_Init,
  52.    "int",    Op_Int,
  53.    "inter",    Op_Inter,
  54.    "invoke",    Op_Invoke,
  55.    "keywd",    Op_Keywd,
  56.    "lab",    Op_Lab,
  57.    "lconcat",    Op_Lconcat,
  58.    "lexeq",    Op_Lexeq,
  59.    "lexge",    Op_Lexge,
  60.    "lexgt",    Op_Lexgt,
  61.    "lexle",    Op_Lexle,
  62.    "lexlt",    Op_Lexlt,
  63.    "lexne",    Op_Lexne,
  64.    "limit",    Op_Limit,
  65.    "line",    Op_Line,
  66.    "link",    Op_Link,
  67.    "llist",    Op_Llist,
  68.    "local",    Op_Local,
  69.    "lsusp",    Op_Lsusp,
  70.    "mark",    Op_Mark,
  71.    "mark0",    Op_Mark0,
  72.    "minus",    Op_Minus,
  73.    "mod",    Op_Mod,
  74.    "mult",    Op_Mult,
  75.    "neg",    Op_Neg,
  76.    "neqv",    Op_Neqv,
  77.    "nonnull",    Op_Nonnull,
  78.  
  79. #ifdef LineCodes
  80.    "noop",    Op_Noop,
  81. #endif                    /* LineCodes */
  82.  
  83.    "null",    Op_Null,
  84.    "number",    Op_Number,
  85.    "numeq",    Op_Numeq,
  86.    "numge",    Op_Numge,
  87.    "numgt",    Op_Numgt,
  88.    "numle",    Op_Numle,
  89.    "numlt",    Op_Numlt,
  90.    "numne",    Op_Numne,
  91.    "pfail",    Op_Pfail,
  92.    "plus",    Op_Plus,
  93.    "pnull",    Op_Pnull,
  94.    "pop",    Op_Pop,
  95.    "power",    Op_Power,
  96.    "pret",    Op_Pret,
  97.    "proc",    Op_Proc,
  98.    "psusp",    Op_Psusp,
  99.    "push1",    Op_Push1,
  100.    "pushn1",    Op_Pushn1,
  101.    "random",    Op_Random,
  102.    "rasgn",    Op_Rasgn,
  103.    "real",    Op_Real,
  104.    "record",    Op_Record,
  105.    "refresh",    Op_Refresh,
  106.    "rswap",    Op_Rswap,
  107.    "sdup",    Op_Sdup,
  108.    "sect",    Op_Sect,
  109.    "size",    Op_Size,
  110.    "str",    Op_Str,
  111.    "subsc",    Op_Subsc,
  112.    "swap",    Op_Swap,
  113.    "tabmat",    Op_Tabmat,
  114.    "tally",    Op_Tally,
  115.    "toby",    Op_Toby,
  116.    "trace",    Op_Trace,
  117.    "unions",    Op_Unions,
  118.    "unmark",    Op_Unmark,
  119.    "value",    Op_Value,
  120.    "var",    Op_Var,
  121.    "version",    Op_Version,
  122.    };
  123.  
  124. int NOPCODES = sizeof(optable) / sizeof(struct opentry);
  125.